home *** CD-ROM | disk | FTP | other *** search
/ MacFormat 1996 January / macformat-033.iso / mac / Education / Modern Media / olisDemo / Shared.DIR / 02009_Help file auto-script.ls < prev    next >
Encoding:
Text File  |  1995-04-13  |  2.8 KB  |  117 lines

  1. on findAndPlayHelp myName, pageNumber
  2.   global currentModule
  3.   if the movieName = "5thAve" then
  4.     help("FaHelp")
  5.     exit
  6.   end if
  7.   if currentModule = #po then
  8.     if myName = "popro" then
  9.       help("PoHelp")
  10.     else
  11.       if myName = "lwPro" then
  12.         help("LwHelp")
  13.       else
  14.         alert("PROGAMMER: Bad movie name for post office module:" && myName)
  15.       end if
  16.     end if
  17.     exit
  18.   end if
  19.   if currentModule = #sd then
  20.     if myName = "SciDome" then
  21.       help("SDHelp")
  22.     else
  23.       if myName = "Terr" then
  24.         help("TeHelp")
  25.       else
  26.         if myName = "SinkFlt" then
  27.           help("SfHelp")
  28.         else
  29.           alert("PROGAMMER: Bad movie name for science dome module:" && myName)
  30.         end if
  31.       end if
  32.     end if
  33.     exit
  34.   end if
  35.   if currentModule = #li then
  36.     if myName = "Lib" then
  37.       help("LiHelp")
  38.     else
  39.       if myName = "Glo" then
  40.         help("GlHelp")
  41.       else
  42.         if myName = "Dic" then
  43.           if pageNumber = 1 then
  44.             help("DiHelp1")
  45.           else
  46.             if pageNumber = 2 then
  47.               help("DiHelp2")
  48.             else
  49.               alert("PROGAMMER: Bad page number for dictionary help:" && pageNumber)
  50.             end if
  51.           end if
  52.         else
  53.           alert("PROGAMMER: Bad movie name for library module:" && myName)
  54.         end if
  55.       end if
  56.     end if
  57.     exit
  58.   end if
  59.   if currentModule = #su then
  60.     if myName = "Recy" then
  61.       if pageNumber = 1 then
  62.         help("CyHelp1")
  63.       else
  64.         if pageNumber = 2 then
  65.           help("CyHelp2")
  66.         else
  67.           alert("PROGAMMER: Bad page number for recycling help:" && pageNumber)
  68.         end if
  69.       end if
  70.     else
  71.       if myName = "Sub" then
  72.         help("SuHelp")
  73.       else
  74.         alert("PROGAMMER: Bad movie name for subway module:" && myName)
  75.       end if
  76.     end if
  77.     exit
  78.   end if
  79.   if currentModule = #ra then
  80.     help("RaHelp")
  81.     exit
  82.   end if
  83.   if currentModule = #aq then
  84.     if myName = "FrogWog" then
  85.       if pageNumber = 1 then
  86.         help("FwHelp1")
  87.       else
  88.         if pageNumber = 2 then
  89.           help("FwHelp2")
  90.         else
  91.           if pageNumber = 3 then
  92.             help("FwHelp3")
  93.           else
  94.             alert("PROGAMMER: Bad page number for frog help:" && pageNumber)
  95.           end if
  96.         end if
  97.       end if
  98.     else
  99.       if myName = "clam" then
  100.         help("CChelp")
  101.       else
  102.         if myName = "Aqua" then
  103.           help("AqHelp")
  104.         else
  105.           alert("PROGAMMER: Bad movie name for aquarium module:" && myName)
  106.         end if
  107.       end if
  108.     end if
  109.     exit
  110.   end if
  111.   if not currentModule then
  112.     alert("PROGRAMMER: currentModule not set!  Use #su, #po, #sd, #aq, #li, or #ra")
  113.   else
  114.     alert("PROGRAMMER: Unknown module:" && currentModule && "Use #su, #po, #sd, #aq, #li, or #ra")
  115.   end if
  116. end
  117.